home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 June: Reference Library / Dev.CD Jun 94.toast / Periodicals / develop / develop Issue 11 / develop 11 code / The NetWork Project / Examples (Sources) / hello.r < prev    next >
Encoding:
Text File  |  1992-07-15  |  9.2 KB  |  557 lines  |  [TEXT/MPS ]
  1. /*    Copyright 1990 The NetWork Project, StatLab Heidelberg.  */
  2.     
  3. #include "Types.R"
  4. #include "SysTypes.R"
  5.  
  6. resource 'vers' (1) {
  7.     0x1,
  8.     0x0,
  9.     alpha,
  10.     0x1,
  11.     verUs,
  12.     "1.0a1",
  13.     "1.0a1©1990 The NetWork Project, StatLab Heidelberg. "
  14. };
  15.  
  16. resource 'SIZE' (-1) {
  17.     dontSaveScreen,
  18.     acceptSuspendResumeEvents,
  19.     enableOptionSwitch,
  20.     canBackground,
  21.     multiFinderAware,
  22.     backgroundAndForeground,
  23.     dontGetFrontClicks,
  24.     ignoreChildDiedEvents,
  25.     is32BitCompatible,
  26.     reserved,
  27.     reserved,
  28.     reserved,
  29.     reserved,
  30.     reserved,
  31.     reserved,
  32.     reserved,
  33.     128000,
  34.     128000
  35. };
  36.  
  37. resource 'ALRT' (130, "About") {
  38.     {86, 95, 236, 395},
  39.     130,
  40.     {    /* array: 4 elements */
  41.         /* [1] */
  42.         OK, visible, silent,
  43.         /* [2] */
  44.         OK, visible, silent,
  45.         /* [3] */
  46.         OK, visible, silent,
  47.         /* [4] */
  48.         OK, visible, silent
  49.     }
  50. };
  51.  
  52. resource 'ALRT' (131, "OkCan") {
  53.     {60, 68, 164, 396},
  54.     131,
  55.     {    /* array: 4 elements */
  56.         /* [1] */
  57.         Cancel, visible, sound2,
  58.         /* [2] */
  59.         Cancel, visible, sound2,
  60.         /* [3] */
  61.         OK, visible, sound2,
  62.         /* [4] */
  63.         OK, visible, sound1
  64.     }
  65. };
  66.  
  67. resource 'ALRT' (132, "Abort", locked, preload) {
  68.     {60, 66, 184, 398},
  69.     132,
  70.     {    /* array: 4 elements */
  71.         /* [1] */
  72.         Cancel, visible, sound2,
  73.         /* [2] */
  74.         Cancel, visible, sound2,
  75.         /* [3] */
  76.         Cancel, visible, sound2,
  77.         /* [4] */
  78.         Cancel, visible, sound1
  79.     }
  80. };
  81.  
  82. resource 'DITL' (128, "STD", locked, preload) {
  83.     {    /* array DITLarray: 6 elements */
  84.         /* [1] */
  85.         {160, 32, 176, 132},
  86.         Button {
  87.             enabled,
  88.             "ok"
  89.         },
  90.         /* [2] */
  91.         {160, 168, 176, 268},
  92.         Button {
  93.             enabled,
  94.             "Cancel"
  95.         },
  96.         /* [3] */
  97.         {6, 124, 43, 295},
  98.         StaticText {
  99.             disabled,
  100.             "^0"
  101.         },
  102.         /* [4] */
  103.         {44, 8, 76, 295},
  104.         StaticText {
  105.             disabled,
  106.             "^1"
  107.         },
  108.         /* [5] */
  109.         {79, 9, 111, 296},
  110.         StaticText {
  111.             disabled,
  112.             "^2"
  113.         },
  114.         /* [6] */
  115.         {115, 9, 147, 296},
  116.         StaticText {
  117.             disabled,
  118.             "^3"
  119.         }
  120.     }
  121. };
  122.  
  123. resource 'DITL' (129, "Progress", preload) {
  124.     {    /* array DITLarray: 6 elements */
  125.         /* [1] */
  126.         {8, 16, 24, 116},
  127.         StaticText {
  128.             disabled,
  129.             "Processing"
  130.         },
  131.         /* [2] */
  132.         {8, 128, 24, 344},
  133.         StaticText {
  134.             disabled,
  135.             "^0"
  136.         },
  137.         /* [3] */
  138.         {32, 21, 48, 341},
  139.         StaticText {
  140.             disabled,
  141.             "^1"
  142.         },
  143.         /* [4] */
  144.         {53, 21, 69, 341},
  145.         StaticText {
  146.             disabled,
  147.             "^2"
  148.         },
  149.         /* [5] */
  150.         {76, 22, 92, 342},
  151.         StaticText {
  152.             disabled,
  153.             "^3"
  154.         },
  155.         /* [6] */
  156.         {101, 104, 118, 250},
  157.         StaticText {
  158.             disabled,
  159.             "Press \0x11 . to abort     "
  160.         }
  161.     }
  162. };
  163.  
  164. resource 'DITL' (130, "About") {
  165.     {    /* array DITLarray: 4 elements */
  166.         /* [1] */
  167.         {1, 0, 163, 314},
  168.         StaticText {
  169.             enabled,
  170.             "Hello is just a place holder"
  171.         },
  172.         /* [2] */
  173.         {46, 1, 98, 295},
  174.         StaticText {
  175.             enabled,
  176.             "It does (nearly) nothing. It shows that "
  177.             "NetWork can launch applications on start"
  178.             "up (even with system 6.x)."
  179.         },
  180.         /* [3] */
  181.         {98, 1, 133, 298},
  182.         StaticText {
  183.             enabled,
  184.             "This feature is used to implement additi"
  185.             "onal transport systems."
  186.         },
  187.         /* [4] */
  188.         {131, 0, 149, 298},
  189.         StaticText {
  190.             enabled,
  191.             "            ©   The NetWork Project, 198"
  192.             "9, 1990"
  193.         }
  194.     }
  195. };
  196.  
  197. resource 'DITL' (131, "OkCan", locked, preload) {
  198.     {    /* array DITLarray: 4 elements */
  199.         /* [1] */
  200.         {80, 80, 100, 136},
  201.         Button {
  202.             enabled,
  203.             "ok"
  204.         },
  205.         /* [2] */
  206.         {80, 200, 100, 260},
  207.         Button {
  208.             enabled,
  209.             "Cancel"
  210.         },
  211.         /* [3] */
  212.         {0, 112, 39, 324},
  213.         StaticText {
  214.             disabled,
  215.             "^0"
  216.         },
  217.         /* [4] */
  218.         {40, 112, 72, 325},
  219.         StaticText {
  220.             disabled,
  221.             "^3"
  222.         }
  223.     }
  224. };
  225.  
  226. resource 'DITL' (132, "Abort", purgeable, preload) {
  227.     {    /* array DITLarray: 4 elements */
  228.         /* [1] */
  229.         {136, 207, 156, 235},
  230.         Button {
  231.             disabled,
  232.             "ok"
  233.         },
  234.         /* [2] */
  235.         {97, 196, 117, 256},
  236.         Button {
  237.             enabled,
  238.             "Cancel"
  239.         },
  240.         /* [3] */
  241.         {4, 113, 46, 329},
  242.         StaticText {
  243.             disabled,
  244.             "^0"
  245.         },
  246.         /* [4] */
  247.         {50, 114, 89, 330},
  248.         StaticText {
  249.             disabled,
  250.             "^3"
  251.         }
  252.     }
  253. };
  254.  
  255. resource 'DITL' (133, "Splash") {
  256.     {    /* array DITLarray: 1 elements */
  257.         /* [1] */
  258.         {2, 0, 192, 312},
  259.         StaticText {
  260.             enabled,
  261.             "Hello is just a place holder. It does no"
  262.             "thing but to show that NetWork can launc"
  263.             "h applications at startup time. \n\nThis f"
  264.             "eature can be used to implement addition"
  265.             "al transport systems."
  266.         }
  267.     }
  268. };
  269.  
  270. resource 'DLOG' (129, "Progress", preload) {
  271.     {200, 95, 316, 452},
  272.     dBoxProc,
  273.     invisible,
  274.     noGoAway,
  275.     0x0,
  276.     129,
  277.     "PROGRESS"
  278. };
  279.  
  280. resource 'DLOG' (128, "Std", preload) {
  281.     {54, 83, 240, 400},
  282.     dBoxProc,
  283.     invisible,
  284.     noGoAway,
  285.     0x0,
  286.     128,
  287.     "Std"
  288. };
  289.  
  290. resource 'DLOG' (130, preload) {
  291.     {130, 142, 324, 450},
  292.     dBoxProc,
  293.     invisible,
  294.     noGoAway,
  295.     0x0,
  296.     130,
  297.     "New Dialog"
  298. };
  299.  
  300. resource 'BNDL' (128) {
  301.     'STAT',
  302.     0,
  303.     {    /* array TypeArray: 2 elements */
  304.         /* [1] */
  305.         'ICN#',
  306.         {    /* array IDArray: 1 elements */
  307.             /* [1] */
  308.             0, 128
  309.         },
  310.         /* [2] */
  311.         'FREF',
  312.         {    /* array IDArray: 1 elements */
  313.             /* [1] */
  314.             0, 128
  315.         }
  316.     }
  317. };
  318.  
  319. resource 'FREF' (128) {
  320.     'APPL',
  321.     0,
  322.     ""
  323. };
  324.  
  325. resource 'ICN#' (128) {
  326.     {    /* array: 2 elements */
  327.         /* [1] */
  328.         $"FFFF FFFF 83FF 0001 8000 0001 83FF 0001"
  329.         $"8000 0001 807F E001 8000 0001 807F E001"
  330.         $"8000 0001 800F FC01 8000 0001 8003 FE01"
  331.         $"8000 0001 8003 FE01 8000 0001 8003 FE01"
  332.         $"8000 0001 800F F001 8000 0001 807E 0001"
  333.         $"8000 0001 87FE 0001 8000 0001 9F00 0001"
  334.         $"8000 0001 8000 0001 9CAA A001 8000 0001"
  335.         $"9CAA 0001 8000 0001 9CAA A001 FFFF FFFF",
  336.         /* [2] */
  337.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  338.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  339.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  340.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  341.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  342.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  343.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  344.         $"FFFF FFFF FFFF FFFF FFFF FFFF FFFF FFFF"
  345.     }
  346. };
  347.  
  348. data 'STAT' (0, "id") {
  349.     $"2754 656D 706C 6174 6520 312E 302E 2053"            /* 'Template 1.0. S */
  350.     $"7461 744C 6162 2048 6569 6465 6C62 6572"            /* tatLab Heidelber */
  351.     $"6720 A920 3139 3836"                                /* g © 1986 */
  352. };
  353.  
  354. resource 'MENU' (3, "mEdit", preload) {
  355.     3,
  356.     textMenuProc,
  357.     0x7FFFFFFD,
  358.     enabled,
  359.     "Edit",
  360.     {    /* array: 6 elements */
  361.         /* [1] */
  362.         "Undo", noIcon, "Z", noMark, plain,
  363.         /* [2] */
  364.         "-", noIcon, noKey, noMark, plain,
  365.         /* [3] */
  366.         "Cut", noIcon, "X", noMark, plain,
  367.         /* [4] */
  368.         "Copy", noIcon, "C", noMark, plain,
  369.         /* [5] */
  370.         "Paste", noIcon, "V", noMark, plain,
  371.         /* [6] */
  372.         "Clear", noIcon, noKey, noMark, plain
  373.     }
  374. };
  375.  
  376. resource 'MENU' (2, "mFile", preload) {
  377.     2,
  378.     textMenuProc,
  379.     0x7FFFFEDF,
  380.     enabled,
  381.     "File",
  382.     {    /* array: 10 elements */
  383.         /* [1] */
  384.         "New", noIcon, "N", noMark, plain,
  385.         /* [2] */
  386.         "Open...", noIcon, "O", noMark, plain,
  387.         /* [3] */
  388.         "Close", noIcon, noKey, noMark, plain,
  389.         /* [4] */
  390.         "Save", noIcon, noKey, noMark, plain,
  391.         /* [5] */
  392.         "Save as...", noIcon, noKey, noMark, plain,
  393.         /* [6] */
  394.         "-", noIcon, noKey, noMark, plain,
  395.         /* [7] */
  396.         "Print...", noIcon, noKey, noMark, plain,
  397.         /* [8] */
  398.         "Page Setup...", noIcon, noKey, noMark, plain,
  399.         /* [9] */
  400.         "-", noIcon, noKey, noMark, plain,
  401.         /* [10] */
  402.         "Quit", noIcon, "Q", noMark, plain
  403.     }
  404. };
  405.  
  406. resource 'MENU' (1, "mApple", preload) {
  407.     1,
  408.     textMenuProc,
  409.     0x7FFFFFFD,
  410.     enabled,
  411.     apple,
  412.     {    /* array: 2 elements */
  413.         /* [1] */
  414.         "About this program...", noIcon, noKey, noMark, plain,
  415.         /* [2] */
  416.         "-", noIcon, noKey, noMark, plain
  417.     }
  418. };
  419.  
  420. resource 'STR#' (128, "FErr", preload) {
  421.     {    /* array StringArray: 29 elements */
  422.         /* [1] */
  423.         "AFile Directory full",
  424.         /* [2] */
  425.         "ADisk full",
  426.         /* [3] */
  427.         "AVolume does not exist",
  428.         /* [4] */
  429.         "AI/O error",
  430.         /* [5] */
  431.         "ABad file/volume name",
  432.         /* [6] */
  433.         "AFile not open",
  434.         /* [7] */
  435.         "AEnd of file reached",
  436.         /* [8] */
  437.         "AFile error -40",
  438.         /* [9] */
  439.         "AFile error -41?",
  440.         /* [10] */
  441.         "AToo many files open",
  442.         /* [11] */
  443.         "RFile not found",
  444.         /* [12] */
  445.         "RVolume locked",
  446.         /* [13] */
  447.         "RFile locked",
  448.         /* [14] */
  449.         "RVolume locked",
  450.         /* [15] */
  451.         "RFile is busy",
  452.         /* [16] */
  453.         "RFile exists",
  454.         /* [17] */
  455.         "RFile is busy (w)",
  456.         /* [18] */
  457.         "AFile error -50",
  458.         /* [19] */
  459.         "APath does not exist",
  460.         /* [20] */
  461.         "AFile error -52",
  462.         /* [21] */
  463.         "AFile error -53",
  464.         /* [22] */
  465.         "RUnlock before trying to write !",
  466.         /* [23] */
  467.         "RAlready mounted",
  468.         /* [24] */
  469.         "ANo such drive.",
  470.         /* [25] */
  471.         "ANot a Mac(+) Disk.",
  472.         /* [26] */
  473.         "AExternal file system.",
  474.         /* [27] */
  475.         "ARename problem",
  476.         /* [28] */
  477.         "ABad master direcory.",
  478.         /* [29] */
  479.         "ANo writing allowed."
  480.     }
  481. };
  482.  
  483. resource 'STR#' (129, "MErr", locked, preload) {
  484.     {    /* array StringArray: 2 elements */
  485.         /* [1] */
  486.         "ANot enough heap space",
  487.         /* [2] */
  488.         "ANil master pointer"
  489.     }
  490. };
  491.  
  492. resource 'STR#' (130, "Rerr", locked, preload) {
  493.     {    /* array StringArray: 4 elements */
  494.         /* [1] */
  495.         "AResource not found",
  496.         /* [2] */
  497.         "AResource file not found",
  498.         /* [3] */
  499.         "AAddResource failed",
  500.         /* [4] */
  501.         "ARmveResource failed"
  502.     }
  503. };
  504.  
  505. resource 'MBAR' (128, "mBarDisplayed", preload) {
  506.     {    /* array MenuArray: 3 elements */
  507.         /* [1] */
  508.         1,
  509.         /* [2] */
  510.         2,
  511.         /* [3] */
  512.         3
  513.     }
  514. };
  515.  
  516. resource 'SIZE' (-1) {
  517.     saveScreen,
  518.     acceptSuspendResumeEvents,
  519.     enableOptionSwitch,
  520.     canBackground,
  521.     multiFinderAware,
  522.     backgroundAndForeground,
  523.     dontGetFrontClicks,
  524.     ignoreChildDiedEvents,
  525.     not32BitCompatible,
  526.     notHighLevelEventAware,
  527.     onlyLocalHLEvents,
  528.     notStationeryAware,
  529.     reserved,
  530.     reserved,
  531.     reserved,
  532.     reserved,
  533.     256000,
  534.     128000
  535. };
  536.  
  537. resource 'vers' (1) {
  538.     0x1,
  539.     0x1,
  540.     release,
  541.     0x0,
  542.     verUS,
  543.     "1.0",
  544.     "1.0d1 ©StatLab Heidelberg 1988"
  545. };
  546.  
  547. resource 'vers' (2) {
  548.     0x0,
  549.     -0x70,
  550.     development,
  551.     0x2,
  552.     verUS,
  553.     "0.9d2",
  554.     "The NetWork Project. 0.9d2"
  555. };
  556.  
  557.